****** Table_7_4: Diversity in Inland and Coastal Cities
use data/city_herfendahl.dta, clear

*1) country dummies
qui reg city_herf_hetero coastal i.country_id
qui local countries=r(r)
qui outreg2 using output/Table_7_4.doc, nor noni nonot nocon stats(coef tstat) addstat("R-squared", e(r2)) addn("*** p<0.01, ** p<0.05, * p<0.1") se bdec(3) keep(coastal) replace

*2) + pop
qui reg city_herf_hetero coastal population_ln i.country_id
qui local countries=r(r)
qui outreg2 using output/Table_7_4.doc, nor noni nonot nocon stats(coef tstat) addstat("R-squared", e(r2)) addn("*** p<0.01, ** p<0.05, * p<0.1") se bdec(3) keep(coastal) append
